home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Presenta / CREATORE.ZIP / DATA.Z / bounce.mmb next >
Text File  |  1997-06-04  |  414b  |  33 lines
  1. This behaviour was generated using Creator Pro.
  2. Copyright cenobyte 1996-1998
  3.  
  4. [NAME]
  5. Bouncing Object
  6.  
  7. [VAR]
  8. x
  9. y
  10.  
  11. [SCRIPT]
  12. if (x=0) then
  13.   x=random(8)-4
  14. endif
  15. if (y=0) then
  16.   y=random(8)-4
  17. endif
  18. object.x=object.x+x
  19. object.y=object.y+y
  20.  
  21. if (object.x<1)
  22.   x=4
  23. endif
  24. if (object.x+object.width>XRES)
  25.   x=-4
  26. endif
  27. if (object.y<1)
  28.   y=4
  29. endif
  30. if (object.y+object.height>YRES)
  31.   y=-4
  32. endif
  33.